一种基于数据库的手机APP用户管理功能例程
事件 MsSQL数据库1.查询记录完毕(查询结果 为 集合)
变量 数组 为 文本型()
关闭进度对话框()
如果 查询结果.取项目总数() = 0 则
信息框("","用户名错误,请重新输入！","确定")
否则
数组=查询结果.取项目(0)
如果 数组(1) = 用户密码编辑框.内容 则
保存设置("当前用户",用户名编辑框.内容)
保存设置("当前用户密码",用户密码编辑框.内容)
切换窗口(读取窗口("设备列表"))
否则
信息框("","密码错误,请重新输入！","确定")
结束 如果
结束 如果
结束 事件
评论